You are here: Available Utilities > M > METRESRC > z/OS Considerations

METRESRC z/OS Considerations

The command line parameter processing is slightly different when running on a z/OS machine. The input (/I), output (/O), and listing (/L) file parameters must specify a DD: name that is defined in your JCL.

DD name

Description

DD:FSISYS

The name of the INI file used by the METRESRC utility

DD:FONTLIB

The name of the PDS containing the Xerox font resources

DD:IMGLIB

The name of the PDS containing the Xerox image resources

DD:LGOLIB

The name of the PDS containing the Xerox logo resources

DD:PFRMLIB

The name of the PDS containing the Xerox form resources

DD:TRACE

The name of the TRACE file

Assume you want to read a Metacode print stream and produce a new Metacode print stream that contains the required Xerox fonts resources and you want the Xerox fonts to be saved on the printer after printing. For this example, assume the following environment on the z/OS machine:

FSI.V111.RPEX1.GENPRINT.PRTBAT1

The Metacode print stream

FSI.V111.RPEX1.DEFLIB(FSISYS)

The FSISYS INI file

FSI.V111.RPEX1.FONTLIB

The Xerox fonts for the print stream

FSI.V111.RPEX1.METRESC1.TRACE

The trace file to produce

FSI.V111.RPEX1.METRESC1.LIST

The listing file to produce

FSI.V111.RPEX1.GENPRINT.PRTBAT1.NEW

The new print stream to produce

The JCL for the METRESRC utility might look like this:

//USERIDA  JOB   (33005),'DAP -         ',CLASS=T,MSGCLASS=X,
//         NOTIFY=USERID
//*
//         SET HLQ='FSI.V111'    <== SET HIGH LEVEL QUALIFIER
//         SET RES='RPEX1'       <== SET RESOURCE (E.G. RPEX1, UTEX1)
//*
//         JCLLIB  ORDER=&HLQ..PROCLIB
//*
//******************************************************************
//*  PROGRAM : METRESRC
//*  PURPOSE : TO DETERMINE THE XEROX RESOURCES USED BY A METACODE
//*            PRINT STREAM.
//*
//*  PARMS   : /I=   NAME OF METACODE PRINT FILE (REQUIRED)
//*            /O=   NAME OF METACODE PRINT FILE TO CREATE WITH
//*                  RESOURCES FILES ADDED
//*            /L=   NAME OF LISTING FILE CONTAINING NAMES OF RESOURCE
//*                  FILES USED (/O OR /L PARAMETERS ARE REQUIRED)
//*                  (BOTH /O AND /L CAN BE USED)
//*            /INI= NAME OF INI FILE CONTAINING XEROX PRINTER INI
//*                  GROUP (OPTIONAL, DEFAULT IS DD:FSISYS)
//*            /P=   NAME OF XEROX PRINTER INI GROUP
//*                  (OPTIONAL, DEFAULT IS XER)
//*            /RESTYPE= TYPE(S) OF RESOURCE FILES TO SEARCH FOR
//*                      (SEPARATED BY COMMAS):
//*                      FNT - XEROX FONT
//*                      IMG - XEROX IMAGE
//*                      FRM - XEROX FORM
//*                      LGO - XEROX LOGO
//*                      ALL - ALL XEROX FILES
//*                            (SAME AS /RESTYPE=FNT,IMG,FRM,LGO)
//*                      (OPTIONAL, DEFAULT IS ALL)
//*            /SAVE  SAVE DOWNLOADED FILES PERMANENTLY ONTO PRINTER
//*                   (OPTIONAL, DEFAULT IS DOWNLOADED FILES ARE
//*                    DELETED FROM PRINTER)
//*
//****************************************************************
//*
//METRESCD EXEC PGM=IEFBR14
//LIST     DD DSN=&HLQ..&RES..METRESC1.LIST,
//            UNIT=SYSDA,SPACE=(TRK,0),
//            DISP=(MOD,DELETE,DELETE)
//TRACE    DD DSN=&HLQ..&RES..METRESC1.TRACE,
//            UNIT=SYSDA,SPACE=(TRK,0),
//            DISP=(MOD,DELETE,DELETE)
//OUTFILE  DD DSN=&HLQ..&RES..GENPRINT.PRTBAT1.NEW,
//            UNIT=SYSDA,SPACE=(TRK,0),
//            DISP=(MOD,DELETE,DELETE)
//*
//METRESC1 EXEC PGM=METRESRC,
                PARM='/ /I=DD:INFILE /L=DD:LIST /O=DD:OUTFILE /SAVE'
//STEPLIB  DD DSN=&HLQ..LINKLIB,DISP=SHR
//         DD DSN=SYS1.SCEERUN,DISP=SHR
//*
//FSISYS   DD DSN=&HLQ..&RES..DEFLIB(FSISYS),DISP=SHR
//INFILE   DD DSN=&HLQ..&RES..GENPRINT.PRTBAT1,DISP=SHR
//OUTFILE  DD DSN=&HLQ..&RES..GENPRINT.PRTBAT1.NEW,
//            DISP=(,CATLG),
//            LIKE=&HLQ..&RES..GENPRINT.PRTBAT1
//LIST     DD DSN=&HLQ..&RES..METRESC1.LIST,
//            UNIT=SYSDA,SPACE=(TRK,(1,1)),DISP=(,CATLG),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//TRACE    DD DSN=&HLQ..&RES..METRESC1.TRACE,
//            UNIT=SYSDA,SPACE=(TRK,(1,1)),DISP=(,CATLG),
//            DCB=(RECFM=VB,LRECL=1024,BLKSIZE=23040)
//FONTLIB  DD DSN=&HLQ..&RES..FONTLIB,DISP=SHR  <=UNCOMMENT AS NEEDED
//*PFRMLIB  DD DSN=&HLQ..&RES..PFRMLIB,DISP=SHR <=UNCOMMENT AS NEEDED
//*IMGLIB  DD DSN=&HLQ..&RES..IMGLIB,DISP=SHR   <=UNCOMMENT AS NEEDED
//*LGOLIB  DD DSN=&HLQ..&RES..LGOLIB,DISP=SHR   <=UNCOMMENT AS NEEDED

//SYSPRINT DD SYSOUT=*

If you have to create a Partitioned Data Set (PDS) for Xerox fonts, forms, images, or logos, you can use these settings as a guide:

 Data Set Name . . . . : FSI.V111.RPEX1.FONTLIB
 
 General Data                          Current Allocation                
  Management class . . : **None**       Allocated cylinders : 75         
  Storage class  . . . : STANDARD       Allocated extents . : 1          
   Volume serial . . . : DCI004         Maximum dir. blocks : 50         
   Device type . . . . : 3390                                            
  Data class . . . . . : **None**                                        
   Organization  . . . : PO            Current Utilization               
   Record format . . . : FB             Used cylinders  . . : 1          
   Record length . . . : 128            Used extents  . . . : 1          
   Block size  . . . . : 27904          Used dir. blocks  . : 1          
   1st extent cylinders: 75             Number of members . : 10         
   Secondary cylinders : 10                                              
   Data set name type  : PDS                                             
 
   Creation date . . . : 2006/02/06     Referenced date . . : 2006/02/07 
   Expiration date . . : ***None***
Note z/OS does not allow file names that begin with a number (0-9). If any of your Xerox resource files begin with a number, you will not be able to upload these files to z/OS. Therefore, you will not be able to run the METRESRC utility on z/OS for this environment. Instead, you must run the METRESRC utility on a Windows or UNIX platform and upload the final print stream to z/OS for printing.